
;环境描述的模板
         CFLAG:38:1515 = RAND:100
		 IF CFLAG:38:1516 == 300
		     IF CFLAG:38:1515 < 100
		         GOTO WORLD_140_0_300
		     ENDIF
		 ENDIF
		 RETURN
		 $WORLD_140_0_300
		 CFLAG:38:1515 = RAND:100
		 IF CFLAG:38:1515 < 100
			 IF TIME:2 > 5
			     CFLAG:38:1515 = RAND:100
				 IF (CFLAG:MASTER:300 == CFLAG:55:300) && CFLAG:38:1515 < 25
		             PRINTFORML 晚上的命莲寺正是最活跃的时间。
	                 PRINTDATA
			             DATALIST
				             DATAFORM 圣白莲住持正在为妖怪们讲解经文，她沉稳而引人入胜的语调在正殿里回荡。
							 DATAFORM %CALLNAME:MASTER%，慢慢地说话。
		                 ENDLIST
	                 ENDDATA
					 PRINTFORMW 
					 RETURN
			     ELSEIF (CFLAG:MASTER:300 != CFLAG:55:300) && CFLAG:38:1515 < 50
			    	 PRINTFORML 晚上的命莲寺正是最热闹的时间。
	                 PRINTDATA
			             DATALIST
				             DATAFORM 妖怪们三个五个聚集在正殿里，高声阔论。
							 DATAFORM %CALLNAME:MASTER%在这热闹的氛围里说话。
		                 ENDLIST
	                 ENDDATA
					 PRINTFORMW 
					 RETURN
				 ELSE
			    	 PRINTFORML 正殿里非常热闹。
	                 PRINTDATA
			             DATALIST
				             DATAFORM %CALLNAME:MASTER%找了一个合适的位置，带着恋恋坐下。
							 DATAFORM 然后，尽可能活跃地对恋恋说话。
		                 ENDLIST
	                 ENDDATA
					 PRINTFORMW 
					 RETURN
				 ENDIF
			 ELSEIF TIME:2 < 3
			     CFLAG:38:1515 = RAND:100
				 IF (CFLAG:MASTER:300 == CFLAG:55:300) && CFLAG:38:1515 < 25
		             PRINTFORML 清晨，命莲寺里寂静空灵。
	                 PRINTDATA
			             DATALIST
				             DATAFORM 圣白莲住持盘踞在正殿之中，给%CALLNAME:MASTER%一股宁静致远的感觉。
							 DATAFORM %CALLNAME:MASTER%静静地说话。
		                 ENDLIST
	                 ENDDATA
					 PRINTFORMW 
					 RETURN
			     ELSEIF (CFLAG:MASTER:300 != CFLAG:55:300) && CFLAG:38:1515 < 50
			    	 PRINTFORML 清晨非常地安静。
	                 PRINTDATA
			             DATALIST
				             DATAFORM 没有什么行动的生物，也没有会行动的生物。
							 DATAFORM %CALLNAME:MASTER%的话语带上了回音。
		                 ENDLIST
	                 ENDDATA
					 PRINTFORMW 
					 RETURN
				 ELSE
			    	 PRINTFORML 正殿很冷清。
	                 PRINTDATA
			             DATALIST
				             DATAFORM %CALLNAME:MASTER%找了一个合适的位置，带着恋恋坐下。
							 DATAFORM 然后，尽可能活跃地对恋恋说话。
		                 ENDLIST
	                 ENDDATA
					 PRINTFORMW 
					 RETURN
				 ENDIF
			 ELSE
			     CFLAG:38:1515 = RAND:100
				 IF (CFLAG:MASTER:300 == CFLAG:55:300) && CFLAG:38:1515 < 25
				     PRINTFORML 正殿里并不是十分安静。
	                 PRINTDATA
			             DATALIST
				             DATAFORM 圣白莲住持正在准备晚上的法会。
							 DATAFORM 数量惊人的卷宗被摆在%CALLNAME:MASTER%的附近，%CALLNAME:MASTER%很小心地没有碰倒它们。
		                 ENDLIST
			             DATALIST
				             DATAFORM 圣白莲住持在一旁喃喃地念经。
							 DATAFORM %CALLNAME:MASTER%的说话被干扰了。
		                 ENDLIST
	                 ENDDATA
					 PRINTFORMW 
					 RETURN
			     ELSEIF (CFLAG:MASTER:300 != CFLAG:55:300) && CFLAG:38:1515 < 50
			    	 PRINTFORML 午后的命莲寺，有一种怡然自如的洒脱感。
	                 PRINTDATA
			             DATALIST
				             DATAFORM 这种感觉主要是针对那些不拘小节的妖怪们，它们在阴影里互相讨酒喝。
							 DATAFORM 说话的%CALLNAME:MASTER%，虽然不是故意的，但还是看见了。
		                 ENDLIST
	                 ENDDATA
					 PRINTFORMW 
					 RETURN
				 ELSE
			    	 PRINTFORML 正殿里并不是十分安静。
	                 PRINTDATA
			             DATALIST
				             DATAFORM 这种感觉主要是针对那些不拘小节的妖怪们，它们在阴影里互相讨酒喝。
							 DATAFORM 说话的%CALLNAME:MASTER%，虽然不是故意的，但还是看见了。
		                 ENDLIST
	                 ENDDATA
					 PRINTFORMW 
					 RETURN
				 ENDIF
		     ENDIF
		 ENDIF
		 PRINTFORMW 
		 RETURN
		 
		 
		 
		 
		 
		 
		 
		 
		 
		 
		 
;用于以后继续观测那个恋恋的状态环境描述		 
		 IF CFLAG:38:1515 < 50
		         PRINTFORML %CALLNAME:MASTER%倚靠在鸟居上。
	                 PRINTDATA
			             DATALIST
				             DATAFORM 望着天。
		                     DATAFORM 说着话。
		                 ENDLIST
						 DATALIST
				             DATAFORM 恋恋也倚靠在鸟居上。
		                     DATAFORM 木刺的锋芒大显神威。
		                 ENDLIST
	                 ENDDATA
					 PRINTFORMW 
					 RETURN
		 ELSEIF CFLAG:38:1515 < 100
		         PRINTFORML 恋恋在鸟居附近游荡。
	                 PRINTDATA
			             DATALIST
				             DATAFORM 望着充满活力的少女，%CALLNAME:MASTER%忽然有了一种。
		                     DATAFORM 放养的感觉。
		                 ENDLIST
			             DATALIST
				             DATAFORM %CALLNAME:MASTER%快步跟上。
		                     DATAFORM 谈话中，一前一后地行走。
		                 ENDLIST
	                 ENDDATA
					 PRINTFORMW 
					 RETURN
		 ENDIF
		 PRINTFORMW 
		 RETURN


		 CFLAG:38:1515 = RAND:100
		 IF CFLAG:38:1516 == 300
		     IF CFLAG:38:1515 < 100
		         GOTO WORLD_20_0_300
		     ENDIF
		 ENDIF
		 RETURN
		 $WORLD_20_0_300
		 CFLAG:38:1515 = RAND:100
		 IF CFLAG:38:1515 < 50
			 IF DAY:2 == 1
                     PRINTFORML 神社境内耸立着许多盛开的樱花树。
	                 PRINTDATA
			             DATALIST
				             DATAFORM 一不注意，恋恋就坐到树的枝丫上面，还摇下了几朵樱花。
		                     DATAFORM %CALLNAME:MASTER%对着恋恋大呼小叫。
		                 ENDLIST
						 DATALIST
				             DATAFORM 恋恋穿过一颗又一颗的樱花树行走，前面总会有更漂亮的樱花指路。
		                     DATAFORM %CALLNAME:MASTER%绕着一圈又一圈的樱花树跟随，行走在活跃的恋恋后面。
		                 ENDLIST
	                 ENDDATA
					 PRINTFORMW 
					 RETURN
			 ELSE
			         PRINTFORML 神社境内耸立着许多樱花树。
	                 PRINTDATA
			             DATALIST
				             DATAFORM 一不注意，恋恋就坐到树的枝丫上面。
		                     DATAFORM %CALLNAME:MASTER%对着恋恋大呼小叫。
		                 ENDLIST
						 DATALIST
				             DATAFORM 恋恋穿过一颗又一颗的树行走。
		                     DATAFORM %CALLNAME:MASTER%绕着一圈又一圈的树跟随。
		                 ENDLIST
	                 ENDDATA
					 PRINTFORMW 
					 RETURN
			 ENDIF
		 ELSEIF CFLAG:38:1515 < 100
		     IF DAY:2 == 1
			     PRINTFORML 神社境内，樱花漫天。
	                 PRINTDATA
			             DATALIST
				             DATAFORM 恋恋一边张望着神社的樱花，一边前行。
		                     DATAFORM %CALLNAME:MASTER%陪伴着活泼的恋恋，在神社境内赏樱谈天。
		                 ENDLIST
						 DATALIST
				             DATAFORM 说话间，%CALLNAME:MASTER%与恋恋信步走向另一处。
		                     DATAFORM 到处都是、到处都是盛开的樱花。
		                 ENDLIST
	                 ENDDATA
					 PRINTFORMW 
					 RETURN
			 ELSE
			     GOTO BACK
			 ENDIF
		 ENDIF
		 PRINTFORMW 
		 RETURN

		 CFLAG:38:1515 = RAND:100
		 IF CFLAG:38:1515 < 40
		     IF TIME:2 < 6 && TIME:5 < 2
			         PRINTFORML 阳光透过树叶，洒下点点痕迹。
	                 PRINTDATA
			             DATALIST
				             DATAFORM 恋恋靠在树上，与%CALLNAME:MASTER%渡过了一段时光。
		                 ENDLIST
			             DATALIST
				             DATAFORM %CALLNAME:MASTER%在树荫下渡步而过，阳光在%CALLNAME:MASTER%身上留下一道道光芒。
							 DATAFORM 恋恋顶着个帽子，亦步亦趋地跟在%CALLNAME:MASTER%身边。
		                 ENDLIST
	                 ENDDATA
					 PRINTFORMW 
					 RETURN
			 ELSE
		             PRINTFORML 妖精的大树，枝繁叶茂。
	                 PRINTDATA
			             DATALIST
				             DATAFORM 恋恋靠在树上，与%CALLNAME:MASTER%渡过了一段时光。
							 DATAFORM 可惜木疙瘩让%CALLNAME:MASTER%的背有些不舒服。
		                 ENDLIST
	                 ENDDATA
					 PRINTFORMW 
					 RETURN
			 ENDIF
		 ELSEIF CFLAG:38:1515 < 100
			    	 PRINTFORML 大树迎风招展。
	                 PRINTDATA
			             DATALIST
				             DATAFORM %CALLNAME:MASTER%带着恋恋迎风前行。
							 DATAFORM 大树发出稀里哗啦的声音，掩盖了%CALLNAME:MASTER%的说话声。
		                 ENDLIST
			             DATALIST
				             DATAFORM %CALLNAME:MASTER%感受着风的吹拂，漫步在参天古树之下。
							 DATAFORM 一种来自恒久以前的清新感觉，让恋恋也表现得更加安分了。
		                 ENDLIST
	                 ENDDATA
					 PRINTFORMW 
					 RETURN
		 ENDIF
		 PRINTFORMW 
		 RETURN
		 $WORLD_50_1_300
		 CFLAG:38:1515 = RAND:100
		 IF CFLAG:38:1515 < 100
		             PRINTFORML 妖精的大树，妖精的家。
	                 PRINTDATA
			             DATALIST
				             DATAFORM 恋恋在%CALLNAME:MASTER%说话的时候，折了一根树枝下来。
		                     DATAFORM 这样做，对别人的家好像不太友好。
						 ENDLIST
			             DATALIST
				             DATAFORM %CALLNAME:MASTER%一边看着树，一边和恋恋说话。
							 DATAFORM 丝毫没有发现恋恋不见了。
		                 ENDLIST
	                 ENDDATA
					 PRINTFORMW 
					 RETURN
		 ENDIF
		 PRINTFORMW 
		 RETURN
		 
		 CFLAG:38:1515 = RAND:100
		 IF CFLAG:38:1515 < 100
			 IF CFLAG:38:1515 < 50
		             PRINTFORML 说话的时候，%CALLNAME:MASTER%打量着这个奇形怪状的遗迹。
	                 PRINTDATA
			             DATALIST
				             DATAFORM 旁边立着一块久经风霜的告示牌，上面写着：
							 DATAFORM 【梦幻遗迹 定员 1名 （以下略）】
		                 ENDLIST
	                 ENDDATA
					 PRINTFORMW 
					 RETURN
			 ELSE
			    	 PRINTFORML 这个遗迹充斥着可疑的氛围，总感觉各种各样的人都会到这里来。
	                 PRINTDATA
			             DATALIST
				             DATAFORM %CALLNAME:MASTER%慢慢地说话。
							 DATAFORM 现在至少有一个人类，和一个觉妖怪了。
		                 ENDLIST
			             DATALIST
				             DATAFORM %CALLNAME:MASTER%顿了顿，避开被风吹起来的传单。
							 DATAFORM 那些传单也很老旧了。
		                 ENDLIST
	                 ENDDATA
					 PRINTFORMW 
					 RETURN
			 ENDIF
		 ENDIF
		 PRINTFORMW 
		 RETURN
		 
		 
		 CFLAG:38:1515 = RAND:100
		 IF CFLAG:38:1515 < 100
			 IF CFLAG:38:1515 < 75
		             PRINTFORML %CALLNAME:MASTER%行走在一条充满地藏的大街上。
	                 PRINTDATA
			             DATALIST
				             DATAFORM 说一句话，走过一个地藏。
							 DATAFORM 再说一句话，再走过一个地藏。
		                 ENDLIST
						 DATALIST
				             DATAFORM 恋恋在地藏们的头上，轻盈地跳来跳去。
		                 ENDLIST
	                 ENDDATA
					 PRINTFORMW 
					 RETURN
			 ELSE
			    	 PRINTFORML 头戴羊绒帽的地藏散布在道路两旁。
	                 PRINTDATA
			             DATALIST
				             DATAFORM %CALLNAME:MASTER%跨过摆在地藏面前的贡品。
							 DATAFORM 恋恋飞翔着，跟在%CALLNAME:MASTER%身后。
		                 ENDLIST
	                 ENDDATA
					 PRINTFORMW 
					 RETURN
			 ENDIF
		 ENDIF
		 PRINTFORMW 
		 RETURN
		 
		 CFLAG:38:1515 = RAND:100
		 IF CFLAG:38:1515 < 50
		             PRINTFORML %CALLNAME:MASTER%在柳树之下停留。
	                 PRINTDATA
			             DATALIST
				             DATAFORM 席地而坐，染上了淡淡泥土。
							 DATAFORM 望着身边的恋恋，时间缓缓流动。
		                 ENDLIST
	                 ENDDATA
					 PRINTFORMW 
					 RETURN
		 ELSE
			 IF DAY:2 == 1
			    	 PRINTFORML 细细长长的柳树矗立在此处，冬芽上长了新枝。
	                 PRINTDATA
			             DATALIST
				             DATAFORM 恋恋慢慢地带着%CALLNAME:MASTER%靠近此处，目光扫过飞舞的柳条。
							 DATAFORM %CALLNAME:MASTER%仍然说着自己想要说的话。
		                 ENDLIST
	                 ENDDATA
					 PRINTFORMW 
					 RETURN
			 ELSE
			    	 PRINTFORML 细细长长的柳树矗立在此处。
	                 PRINTDATA
			             DATALIST
				             DATAFORM %CALLNAME:MASTER%靠近此处，柳条随风舞动。
							 DATAFORM %CALLNAME:MASTER%嘴里仍然说着自己想要说的话。
		                 ENDLIST
	                 ENDDATA
					 PRINTFORMW 
					 RETURN
			 ENDIF
		 ENDIF
		 PRINTFORMW 
		 RETURN
		 
		 
		 
		 CFLAG:38:1515 = RAND:100
		 IF CFLAG:38:1515 < 100
		     CFLAG:38:1515 = RAND:100
		     IF CFLAG:38:1515 < 50
			     IF TIME:2 > 5
			    	 PRINTFORML 走在参拜道上，两旁的石灯笼照亮了前行的路。
	                 PRINTDATA
			             DATALIST
				             DATAFORM 微弱的光芒下，命莲寺却并不冷清。
							 DATAFORM %CALLNAME:MASTER%喉头微动，总归是停下休息了一会。
		                 ENDLIST
			             DATALIST
				             DATAFORM 空气中隐约传来阵阵念诵经文的声音。
							 DATAFORM %CALLNAME:MASTER%继续着自己的话语，诵经声，%CALLNAME:MASTER%的说话声，悠然交织成阵阵低吟。
		                 ENDLIST
	                 ENDDATA
					 PRINTFORMW 
					 RETURN
			     ELSEIF TIME:2 < 3
				     PRINTFORML 漫步在早晨的参拜道上。
	                 PRINTDATA
				 		 DATALIST
				             DATAFORM 有少量的妖怪在%CALLNAME:MASTER%说话时擦肩而过。
							 DATAFORM 它们看上去无精打采，默不作声。
		                 ENDLIST
						 DATALIST
				             DATAFORM 道路两旁的石灯笼，里面的火焰时断时续。
							 DATAFORM %CALLNAME:MASTER%和恋恋，迎着早晨，在此处停留了一会。
		                 ENDLIST
					 ENDDATA
					 PRINTFORMW 
					 RETURN
			     ELSE
			    	 PRINTFORML 走在参拜道上。
	                 PRINTDATA
					     DATALIST
				             DATAFORM 有些妖怪在%CALLNAME:MASTER%说话时擦肩而过。
							 DATAFORM 它们时而高谈阔论，时而低声谈论，盖过了%CALLNAME:MASTER%说话的声音。
		                 ENDLIST
			             DATALIST
				             DATAFORM 道路两旁的石灯笼被精心地点亮。
							 DATAFORM %CALLNAME:MASTER%和恋恋在此处停留了一会。
		                 ENDLIST
	                 ENDDATA
					 PRINTFORMW 
					 RETURN
			     ENDIF
		     ELSEIF CFLAG:38:1515 < 75
			     IF CFLAG:38:1515 < 100
			         ;钟楼，指向了%TIME:0 / 60%点钟的样子
				     PRINTFORML 时钟，矗立在大地之上。
	                 PRINTDATA
				 		 DATALIST
				             DATAFORM 恋恋在钟楼附近徘徊。
							 DATAFORM 而%CALLNAME:MASTER%，则在一旁叮嘱恋恋。
		                 ENDLIST
						 DATALIST
				             DATAFORM 恋恋踮起脚尖，似乎在确认时间。
							 DATAFORM 虽然恋恋把看时间这件事表现得很重要，但%CALLNAME:MASTER%仍然在开口说话。
		                 ENDLIST
					 ENDDATA
					 PRINTFORMW 
					 RETURN
			     ENDIF
		     ELSE
                 IF DAY:2 == 2 && TIME:2 < 6 && TIME:5 < 2
				     PRINTFORML %CALLNAME:MASTER%站在了石门附近。
	                 PRINTDATA
				 		 DATALIST
				             DATAFORM 烈阳高照，石门背后拉下一道长长的影子。
							 DATAFORM %CALLNAME:MASTER%一边享受着清凉的空气，一边对恋恋说话。
		                 ENDLIST
						 DATALIST
				             DATAFORM %CALLNAME:MASTER%感受到了一丝来自心底的清凉。
							 DATAFORM 一旁的恋恋也因为天气炎热而减少了活动。
		                 ENDLIST
					 ENDDATA
					 PRINTFORMW 
					 RETURN
			     ELSE
			    	 PRINTFORML %CALLNAME:MASTER%站在了石门附近。
	                 PRINTDATA
					     DATALIST
				             DATAFORM 倚靠着它，%CALLNAME:MASTER%对恋恋说起了话。
		                 ENDLIST
	                 ENDDATA
					 PRINTFORMW 
					 RETURN
			     ENDIF
		     ENDIF
		 ENDIF
		 PRINTFORMW 
		 RETURN		 
		 
		 IF CFLAG:38:1515 < 100
			     IF CFLAG:38:1515 < 50
		             PRINTFORML 墓地的空气很沉闷。
	                 PRINTDATA
			             DATALIST
				             DATAFORM 不知道是不是心理作用，%CALLNAME:MASTER%总感觉自己的鼻腔被塞住了。
							 DATAFORM %CALLNAME:MASTER%沉重地继续说话。
		                 ENDLIST
						 DATALIST
				             DATAFORM %CALLNAME:MASTER%感觉空气也粘稠了起来。
							 DATAFORM 就连吐字也变得万斤重。
		                 ENDLIST
	                 ENDDATA
					 PRINTFORMW 
					 RETURN
			     ELSE
			    	 PRINTFORML 一种压抑的感觉。
	                 PRINTDATA
			             DATALIST
				             DATAFORM 停留在这个地方，%CALLNAME:MASTER%说着说着。
							 DATAFORM 时间不知不觉减缓了。
		                 ENDLIST
			             DATALIST
				             DATAFORM 正因为知道这是墓地，所以才如鲠在喉。
							 DATAFORM %CALLNAME:MASTER%断断续续地说着。
		                 ENDLIST
			             DATALIST
				             DATAFORM %CALLNAME:MASTER%的头皮有些瘙痒。
							 DATAFORM 加重了腹部的压力，%CALLNAME:MASTER%继续说着。
		                 ENDLIST
	                 ENDDATA
					 PRINTFORMW 
					 RETURN
			     ENDIF
		 ENDIF
		 PRINTFORMW 
		 RETURN